home *** CD-ROM | disk | FTP | other *** search
/ Graphics Plus / Graphics Plus.iso / msdos / raytrace / pov / gen / plant05 / desert.pi next >
Text File  |  1993-10-07  |  2KB  |  78 lines
  1. // Generic Polyray input file by Rob Bryerton 
  2. // Sand and a nice bright sky with a light cloud cover
  3.  
  4. include "..\colors.inc"
  5. include "..\texture.inc"
  6.  
  7. viewpoint {
  8.    from <10,14,-23>  
  9.    at <0,8,0>
  10.    angle 45
  11.    aspect 4/3
  12.    resolution 320, 240
  13.    }
  14.  
  15. light <60, 100, -110>
  16. background SkyBlue
  17.  
  18. include "plant.inc"
  19.  plant 
  20.  
  21. define lookup_sawtooth 1
  22. define ripple_normal 2
  23.  
  24. define ground_ripple
  25. texture {
  26.    noise surface {
  27.       color <1, 0.66, 0.2>
  28.       normal ripple_normal
  29.       frequency 100
  30.       bump_scale 0.25   // was 2
  31.       ambient 0.3
  32.       diffuse 0.7
  33.       }
  34.    }
  35.  
  36.  
  37. define cloud_map
  38.         color_map(               
  39.                  [0.0, 0.4, <1,1,1> ,1.0 , <1,1,1>       ,1.0 ]
  40.                  [0.4, 0.9, <1,1,1>       ,1.0 , <1, 1, 1>     ,0.0]  
  41.                  [0.9, 1.0, <1,1,1>,<1,1,1>])
  42.  
  43. define cloud_tex
  44. texture{
  45.         layered
  46.         texture{
  47.                 special surface {
  48.                 color cloud_map[bozo_fn]
  49.                 ambient 0.75
  50.                 diffuse 0.0
  51.                 }
  52.            },      // note the comma that separates the layered texture 
  53.       texture {     // definitions... this is a clear surface (air)
  54.         surface {
  55.                 ambient 0
  56.                 diffuse 0
  57.                 specular 0.0
  58.                 transmission white, 1, 1.000292   // ior for AIR
  59.             }
  60.          }
  61.  
  62. }      
  63.  
  64. // Add the sky to the picture ... these are the actual clouds
  65. object {
  66.    sphere <0, -1, 0>, 1000                      
  67.    scale <7.5, 1, 7.5>                          
  68.    cloud_tex { scale <100, 33, 33>  rotate < 0, 0, -45 >                
  69.         }                       
  70.    }    
  71.  
  72. // Define the desert sand
  73. object {
  74.    disc <0, -0.25, 0>, <0, 1, 0>, 1000
  75.    ground_ripple { scale <100, 300, 100> }   
  76. }
  77.  
  78.